function ret=grillaCorta(t, r)
if(nargin == 1) ret = @(x) grilla(x, t);
else if(nargin == 2) ret = @(x) grilla(x, t, r);
end;
end;
